object RollUp: TRollUp
  Left = 193
  Top = 179
  BorderIcons = []
  BorderStyle = bsNone
  ClientHeight = 105
  ClientWidth = 228
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  PixelsPerInch = 96
  Visible = True
  OnCreate = FormCreate
  TextHeight = 16
  object FormArea: TPanel
    Left = 0
    Top = 0
    Width = 228
    Height = 105
    Align = alClient
    BevelInner = bvRaised
    BevelOuter = bvNone
    BorderStyle = bsSingle
    TabOrder = 0
    object CaptionPanel: TPanel
      Left = 1
      Top = 1
      Width = 224
      Height = 17
      Align = alTop
      BevelOuter = bvNone
      BorderStyle = bsSingle
      Color = clNavy
      Font.Color = clBlack
      Font.Height = -12
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      PopupMenu = CloseMenu
      TabOrder = 0
      OnMouseDown = CaptionPanelMouseDown
      OnMouseMove = CaptionPanelMouseMove
      OnMouseUp = CaptionPanelMouseUp
      object CloseButton: TSpeedButton
        Left = 1
        Top = 0
        Width = 15
        Height = 15
        Glyph.Data = {
          B0000000424DB000000000000000760000002800000008000000080000000100
          0400000000002000000000000000000000000000000000000000000000000000
          8000008000000080800080000000800080008080000080808000C0C0C0000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
          888887777778000000070FFFFF07000000088888888888888888000000000000
          0000000000000000000000000000000000000000}
        OnClick = CloseButtonClick
      end
      object CaptionLabel: TLabel
        Left = 20
        Top = 0
        Width = 29
        Height = 15
        Caption = 'Curt'
        Font.Color = clWhite
        Font.Height = -12
        Font.Name = 'Arial'
        Font.Style = []
        ParentFont = False
        Transparent = True
        OnMouseDown = CaptionPanelMouseDown
        OnMouseMove = CaptionPanelMouseMove
        OnMouseUp = CaptionPanelMouseUp
      end
      object RollButton: TSpeedButton
        Left = 169
        Top = 0
        Width = 15
        Height = 15
        Glyph.Data = {
          E0000000424DE00000000000000076000000280000000A0000000A0000000100
          0400000000005000000000000000000000000000000000000000000000000000
          8000008000000080800080000000800080008080000080808000C0C0C0000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888800
          0000800000000800000080888888080000008088888808000000808888880800
          0000800008880800000080FF08880800000080FF088808000000800000000800
          0000888888888800000000000000000000000000000000000000000000000000
          00000000}
        OnClick = RollButtonClick
      end
    end
  end
  object CloseMenu: TPopupMenu
    AutoPopup = False
    Left = 195
    Top = 3
    object CloseMenuItem: TMenuItem
      Caption = '&Close'
      OnClick = CloseMenuItemClick
    end
  end
end